home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 4 / BBS in a Box - Macintosh - Volume IV (January 1992) (BBS in a Box).iso / Files / Tele / G / GEnieDL'er.cpt / Append DL List < prev    next >
Encoding:
Text File  |  1988-08-10  |  500 b   |  20 lines  |  [TEXT/MACA]
  1.  Settings File = GEnie-upl
  2.  Script Name = Append DL List
  3.  Command Key = 
  4.  F-key = 
  5.  Menu = NO
  6.  Button = NO
  7.  
  8. 1   Send Text String  "^S"
  9. 2   Append to File "DL Files List"
  10. 3   Set Variable Done from Expression  "=false"
  11. 4   Repeat
  12. 5     Set Variable MFileName from Dialog Box  "Please Enter File Name / Number :"
  13. 6     If Expression  "=Length(MFileName)=0"
  14. 7       Leave
  15. 8     End If
  16. 9     Send Local to File  "=MFileName,'^M'"
  17. 10  Until Expression  "=Done"
  18. 11  Capture Off 
  19. 12  Send Text String  "^Q"
  20.